home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / mmedia / system / ap2 / scripts / vr1___i3.p2s < prev    next >
Encoding:
Text File  |  1994-05-04  |  4.3 KB  |  175 lines
  1. ###########################################################################
  2. #
  3. # file name: VR1____1.P2S
  4. # description:  open video in, record, play and close
  5. # settings: 
  6. #           rate: 15 frames per sec
  7. #           compression: ultimotion
  8. #           video quality: 5000
  9. #           audio: 11025 samples per sec, 16 bits, 2 channel, volume 100
  10. #           video source: 640 x 480
  11. #           video destination: 320 x 240
  12. #
  13. ###########################################################################
  14.  
  15. ############################################
  16. #
  17. #   open Video In
  18. #
  19. ############################################
  20.  
  21. OPEN DIGITALVIDEO02 ALIAS VID SHAREABLE NOTIFY
  22. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_OPEN #1
  23. @WAIT_NOTIFY 1 45000
  24.  
  25. ############################################
  26. #
  27. #   set video monitor on/off
  28. #
  29. ############################################
  30.  
  31. SET VID MONITOR ON NOTIFY
  32. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SET #57
  33. @WAIT_NOTIFY 57 30000
  34.  
  35. ############################################
  36. #
  37. #   enable audio monitor
  38. #
  39. ############################################
  40.  
  41. CONNECTION VID QUERY TYPE WAVE STREAM ALIAS AMP WAIT
  42.  
  43. SET AMP MONITOR ON WAIT
  44.  
  45. ############################################
  46. #
  47. #   load a new file
  48. #
  49. ############################################
  50.  
  51. LOAD VID NEW NOTIFY
  52. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_LOAD #13
  53. @WAIT_NOTIFY 13 30000
  54.  
  55. ############################################
  56. #
  57. #   set time format to milliseconds
  58. #
  59. ############################################
  60.  
  61. SET VID TIME FORMAT MILLISECONDS NOTIFY
  62. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SET #17
  63. @WAIT_NOTIFY 17 30000
  64.  
  65. ############################################
  66. #
  67. #   set the frames per sec (15,30)
  68. #
  69. ############################################
  70.  
  71. SET VID VIDEO RECORD RATE 15 NOTIFY
  72. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SET #21
  73. @WAIT_NOTIFY 21 30000
  74.  
  75. ############################################
  76. #
  77. #   set compression type:
  78. #     - DIB:  raw = uncompressed
  79. #     - ULTI: ultimotion
  80. #     - RT21: indeo
  81. #
  82. ############################################
  83.  
  84. SET VID VIDEO COMPRESSION ULTI NOTIFY
  85. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SET #25
  86. @WAIT_NOTIFY 25 30000
  87.  
  88. ############################################
  89. #
  90. #   set video quality (0-10000)
  91. #
  92. ############################################
  93.  
  94. SET VID VIDEO QUALITY 5000 NOTIFY
  95. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SET #29
  96. @WAIT_NOTIFY 29 30000
  97.  
  98. ############################################
  99. #
  100. #   set audio parameters:
  101. #     - SAMPLESPERSEC: 11025,22050,44100
  102. #     - CHANNEL: 1,2
  103. #     - BITSPERSAMPLE: 8,16
  104. #     - VOLUME: 0-100
  105. #
  106. ############################################
  107.  
  108. SET VID SAMPLESPERSEC 11025 NOTIFY
  109. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SET #33
  110. @WAIT_NOTIFY 33 30000
  111.  
  112. SET VID CHANNELS 2 NOTIFY
  113. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SET #37
  114. @WAIT_NOTIFY 37 30000
  115.  
  116. SET VID BITSPERSAMPLE 16 NOTIFY
  117. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SET #41
  118. @WAIT_NOTIFY 41 30000
  119.  
  120. SET VID AUDIO VOLUME 100 NOTIFY
  121. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SET #45
  122. @WAIT_NOTIFY 45 30000
  123.  
  124. ############################################
  125. #
  126. #   set window size
  127. #
  128. ############################################
  129.  
  130. PUT VID RECORD SOURCE AT 0 0 640 480 NOTIFY
  131. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PUT #49
  132. @WAIT_NOTIFY 49 30000
  133.  
  134. PUT VID RECORD DESTINATION AT 0 0 320 240 NOTIFY
  135. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PUT #53
  136. @WAIT_NOTIFY 53 30000
  137.  
  138. ############################################
  139. #
  140. #   message to user: play source
  141. #
  142. ############################################
  143.  
  144. @BREAK Make sure that the source is already playing
  145.  
  146. ############################################
  147. #
  148. #   record for 10 seconds
  149. #
  150. ############################################
  151.  
  152. RECORD VID TO 10000 NOTIFY
  153. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_RECORD #81
  154. @WAIT_NOTIFY 81 50000
  155.  
  156. ############################################
  157. #
  158. #   play the file
  159. #
  160. ############################################
  161.  
  162. PLAY VID FROM 0 NOTIFY
  163. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PLAY #84
  164. @WAIT_NOTIFY 84 50000
  165.  
  166. ############################################
  167. #
  168. #   close video in
  169. #
  170. ############################################
  171. CLOSE VID NOTIFY
  172. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CLOSE #99
  173. @WAIT_NOTIFY 99 30000
  174.  
  175.